^ ed.sh finds and lists all subdirs found in current dir
  and prompts for the subdir number to log into ^
local EDLN EDX EDY EDDirName
shx -ddn1 *.* > sh1tmp1.@@@
EDLN=1
EDX=2
EDY=1
cls
for EDDirName infile sh1tmp1.@@@
  gotoxy %EDX %EDY
  echo %EDLN: %EDDirName
  compute EDLN= %EDLN + 1
  if %EDLN == 10
    EDX=1
  endif
  compute EDY= %EDY + 1
  if %EDY == 21
    compute EDX= %EDX + 16
    EDY=1
  endif
endfor
if %EDLN > 1
  gotoxy 1 23
  echo Enter Dir number:_
  accept EDDirName
  if '%EDDirName' != '' & %EDDirName < %EDLN
    cd `shx -xt sh1tmp1.@@@ %EDDirName`
    del ..\sh1tmp1.@@@
  else
    del sh1tmp1.@@@
  endif
endif
if '%1' == 'S'
  showstat
endif
